home *** CD-ROM | disk | FTP | other *** search
/ Power Programmierung / Power-Programmierung (Tewi)(1994).iso / magazine / msysjour / vol05 / 05 / based / environ.c < prev    next >
Text File  |  1990-09-01  |  1KB  |  46 lines
  1. #include<stdio.h>
  2. #include<dos.h>
  3. #include<stdlib.h>
  4. #include<string.h>
  5.  
  6. _segment psp;
  7.  
  8. typedef struct _psp
  9.     {
  10.     unsigned        int20;
  11.     unsigned        allocblockseg;
  12.     char            reserved0;
  13.     unsigned char   dosfunctdispatch[5];
  14.     unsigned long   int22;
  15.     unsigned long   int23;
  16.     unsigned long   int24;
  17.     char            reserved1[22];
  18.     _segment        envseg;
  19.     } PSP;
  20.  
  21. PSP _based(psp) *pspptr = 0;
  22.  
  23. void main(void)
  24.     {
  25.     psp = _psp;
  26.  
  27. printf(
  28.    "Int22 is set to %lp\nInt23 is set to %lp\nInt24 is set to %lp\n",
  29.        (void far *)pspptr->int22,
  30.        (void far *)pspptr->int23,
  31.        (void far *)pspptr->int24);
  32.  
  33.         {
  34.         _segment envseg = pspptr->envseg;
  35.         char _based((_segment)envseg) *envptr = 0;
  36.  
  37.  
  38.         printf("pspptr->envseg=%04x\n",pspptr->envseg);
  39.         printf("Environment:\n");
  40.         for( ; *((char far *)envptr);
  41.             envptr += _fstrlen((char far *)envptr)+1)
  42.             printf("%Fs\n",(char far *)envptr);
  43.  
  44.         }
  45.     }
  46.